title     "residential irrigation"
input     T1, T2, RH, Solar;
output    Zone_1;
output    Zone_2;
output    Zone_3;
output    Zone_4;
output    Beep;
var       vClock, vDay;
var       vEnd11, vEnd12, vEnd13, vEnd14;
var       vEnd21, vEnd22, vEnd23, vEnd24;
var       vEnd31, vEnd32, vEnd33, vEnd34;
var       vSun;
parameter pManual, pAux0,    pAux1;
parameter pDay1,   pDay2,    pDay3;
parameter pStart1, pStart2,  pStart3;
parameter pD1T1,   pD1T2,    pD1T3,    pD1T4;
parameter pD2T1,   pD2T2,    pD2T3,    pD2T4;
parameter pD3T1,   pD3T2,    pD3T3,    pD3T4;

//pStartHour = pStartHour%24;
//pStartMinute = pStartMinute%60;
pDay1 = pDay1%8;
pDay2 = pDay2%8;
pDay3 = pDay3%8;
vDay = _day;
vClock = (60*_hour)+_minute;

vEnd11=pStart1 + pD1T1;
vEnd12=vEnd11  + pD1T2;
vEnd13=vEnd12  + pD1T3;
vEnd14=vEnd13  + pD1T4;

vEnd21=pStart2 + pD2T1;
vEnd22=vEnd21  + pD2T2;
vEnd23=vEnd22  + pD2T3;
vEnd24=vEnd23  + pD2T4;

vEnd31=pStart3 + pD3T1;
vEnd32=vEnd31  + pD3T2;
vEnd33=vEnd32  + pD3T3;
vEnd34=vEnd33  + pD3T4;

Zone_1 = 0;
Zone_2 = 0;
Zone_3 = 0;
Zone_4 = 0;
Beep = 0;

Zone_1 = 0;
Zone_2 = 0;
Zone_3 = 0;
Zone_4 = 0;

if(_day==pDay1)
 {
  if((vClock>=pStart1)&&(vClock<vEnd11)){Zone_1 = -1;}
  if((vClock>=vEnd11)&&(vClock<vEnd12)) {Zone_2 = -1;}
  if((vClock>=vEnd12)&&(vClock<vEnd13)) {Zone_3 = -1;}
  if((vClock>=vEnd13)&&(vClock<vEnd14)) {Zone_4 = -1;}
  }

if(_day==pDay2)
 {
  if((vClock>=pStart2)&&(vClock<vEnd21)){Zone_1 = -1;}
  if((vClock>=vEnd21)&&(vClock<vEnd22)) {Zone_2 = -1;}
  if((vClock>=vEnd22)&&(vClock<vEnd23)) {Zone_3 = -1;}
  if((vClock>=vEnd23)&&(vClock<vEnd24)) {Zone_4 = -1;}
  }

if(_day==pDay3)
 {
  if((vClock>=pStart3)&&(vClock<vEnd31)){Zone_1 = -1;}
  if((vClock>=vEnd31)&&(vClock<vEnd32)) {Zone_2 = -1;}
  if((vClock>=vEnd32)&&(vClock<vEnd33)) {Zone_3 = -1;}
  if((vClock>=vEnd33)&&(vClock<vEnd34)) {Zone_4 = -1;}
  if(vClock>=vEnd34){pDay3 = 0;}
  }

if(pManual&1){ Zone_1 = -1;}
if(pManual&2){ Zone_2 = -1;}
if(pManual&4){ Zone_3 = -1;}
if(pManual&8){ Zone_4 = -1;}

if(pManual&0x10){ Zone_1 = 0;}
if(pManual&0x20){ Zone_2 = 0;}
if(pManual&0x40){ Zone_3 = 0;}
if(pManual&0x80){ Zone_4 = 0;}